home *** CD-ROM | disk | FTP | other *** search
/ Netware Super Library / Netware Super Library.iso / vbasic / nivb / nwmisc.bas < prev    next >
BASIC Source File  |  1993-05-05  |  2KB  |  30 lines
  1. 'NWMISC.BAS  NetWare Miscellaneous Services Interface for Visual Basic For Windows
  2. 'Version 1.0
  3. 'Novell Systems Research Department, Novell, Inc.
  4. 'Copyright (c) 1993, Novell, Inc.
  5. 'This interface is not supported through Novell's regular
  6. 'support channels.  See README.TXT for more information.
  7.  
  8. 'destStr$ must be initialized to the length of srcStr$ (including terminating null)
  9. Declare Function ASCIIZToLenStr Lib "NWNETAPI.DLL" (ByVal destStr$, ByVal srcStr$) As Integer
  10. 'fullPath$ must be initialized to 255 bytes
  11. Declare Function ConvertNameToFullPath Lib "NWNETAPI.DLL" (ByVal partialPath$, ByVal fullPath$) As Integer
  12. 'path$ must be initialized to 255 bytes
  13. Declare Function ConvertNameToVolumePath Lib "NWNETAPI.DLL" (ByVal fileName$, ByVal path$) As Integer
  14. 'path must be initialized to 255 bytes
  15. Declare Function GetFullPath Lib "NWNETAPI.DLL" (ByVal drive%, ByVal path$) As Integer
  16. Declare Function GetNetworkSerialNumber Lib "NWNETAPI.DLL" (serialNumber&, applicationNumber%) As Integer
  17. Declare Function IntSwap Lib "NWNETAPI.DLL" (ByVal unswappedInteger%) As Integer
  18. Declare Function IsV3Supported Lib "NWNETAPI.DLL" (ByVal serverConnID%) As Integer
  19. 'destStr$ must be initialized to the length of scrStr$
  20. Declare Function LenToASCIIZStr Lib "NWNETAPI.DLL" (ByVal destStr, ByVal srcStr) As Integer
  21. Declare Function LongSwap Lib "NWNETAPI.DLL" (ByVal unswappedLong&) As Long
  22. 'server$ must be initialized to 48 bytes
  23. 'volume$ must be initialized to 16 bytes
  24. 'directories must be initialized to 255 bytes
  25. Declare Function ParsePath Lib "NWNETAPI.DLL" (ByVal path$, ByVal server$, ByVal volume$, ByVal directories$) As Integer
  26. 'server$ must be initialized to 48 bytes
  27. Declare Function StripFileServerFromPath Lib "NWNETAPI.DLL" (ByVal path$, ByVal server$) As Integer
  28. Declare Function VerifyNetworkSerialNumber Lib "NWNETAPI.DLL" (ByVal serialNumber&, applicationNumber%) As Integer
  29.  
  30.